COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	BEGIN "FOO"
C00003 ENDMK
C⊗;
BEGIN "FOO"

STRING ITEMVAR SI;
STRING S;

S←DATUM(SI);

END;